object Form1: TForm1
  Left = 305
  Top = 320
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Miniwerks'
  ClientHeight = 22
  ClientWidth = 170
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  PopupMenu = PopupMenu1
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object MediaPlayer1: TMediaPlayer
    Left = 40
    Top = -8
    Width = 29
    Height = 30
    VisibleButtons = []
    AutoOpen = True
    DeviceType = dtCDAudio
    Visible = False
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 150
    Height = 22
    BevelOuter = bvNone
    TabOrder = 1
    object BackButton: TSpeedButton
      Left = 0
      Top = 0
      Width = 25
      Height = 22
      Hint = 'Previous Track'
      Glyph.Data = {
        E6000000424DE60000000000000076000000280000000D0000000E0000000100
        0400000000007000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        30003FFF333333FF3000308F33333F8F3000308F3333F88F3000308F333F888F
        3000308F33F8888F3000308F3F88888F3000308F3088888F3000308F3308888F
        3000308F3330888F3000308F3333088F3000308F3333308F3000300033333300
        30003333333333333000}
      ParentShowHint = False
      ShowHint = True
      OnClick = BackButtonClick
    end
    object PlayButton: TSpeedButton
      Left = 25
      Top = 0
      Width = 25
      Height = 22
      Hint = 'Play'
      Glyph.Data = {
        E6000000424DE6000000000000007600000028000000100000000E0000000100
        0400000000007000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333FF3333333333333308FF3333333333330888FF3333333333088888FF3
        333333308888888FF3333330888888888FF33330888888888003333088888880
        0333333088888003333333308880033333333330800333333333333003333333
        33333333333333333333}
      ParentShowHint = False
      ShowHint = True
      OnClick = PlayButtonClick
    end
    object PauseButton: TSpeedButton
      Left = 50
      Top = 0
      Width = 25
      Height = 22
      Hint = 'Pause'
      Enabled = False
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333FFFFF33FFFFF33330888F330888F33330888F330888F33330888F33088
        8F33330888F330888F33330888F330888F33330888F330888F33330888F33088
        8F33330888F330888F33330888F330888F33330888F330888F33330888F33088
        8F3333000003300000333333333333333333}
      ParentShowHint = False
      ShowHint = True
      OnClick = PauseButtonClick
    end
    object StopButton: TSpeedButton
      Left = 75
      Top = 0
      Width = 25
      Height = 22
      Hint = 'Stop'
      Enabled = False
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333FFFFFFFFFFFF333308888888888F33330888888888
        8F333308888888888F333308888888888F333308888888888F33330888888888
        8F333308888888888F333308888888888F333308888888888F33330000000000
        003333333333333333333333333333333333}
      ParentShowHint = False
      ShowHint = True
      OnClick = StopButtonClick
    end
    object NextButton: TSpeedButton
      Left = 100
      Top = 0
      Width = 25
      Height = 22
      Hint = 'Next Track'
      Glyph.Data = {
        E6000000424DE60000000000000076000000280000000D0000000E0000000100
        0400000000007000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        30003FF333333FFF3000308F3333308F30003088F333308F300030888F33308F
        3000308888F3308F30003088888F308F300030888880308F300030888803308F
        300030888033308F300030880333308F300030803333308F3000300333333000
        30003333333333333000}
      ParentShowHint = False
      ShowHint = True
      OnClick = NextButtonClick
    end
    object EjectButton: TSpeedButton
      Left = 125
      Top = 0
      Width = 25
      Height = 22
      Hint = 'Eject'
      Glyph.Data = {
        DE000000424DDE0000000000000076000000280000000D0000000D0000000100
        0400000000006800000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        30003FFFFFFFFFFF300030888888888F30003000000000003000333333333333
        30003FFFFFFFFFFF300030888888888030003308888888033000333088888033
        3000333308880333300033333080333330003333330333333000333333333333
        3000}
      ParentShowHint = False
      ShowHint = True
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 24
    Top = 65520
    object Play1: TMenuItem
      Caption = '&Play'
      ShortCut = 0
      OnClick = Play1Click
    end
    object Next1: TMenuItem
      Caption = 'P&ause'
      ShortCut = 0
      OnClick = Next1Click
    end
    object Stop1: TMenuItem
      Caption = '&Stop'
      ShortCut = 0
      OnClick = Stop1Click
    end
    object Next2: TMenuItem
      Caption = '&Next Track'
      ShortCut = 0
      OnClick = Next2Click
    end
    object PreviousTrack1: TMenuItem
      Caption = 'P&revious Track'
      ShortCut = 0
      OnClick = PreviousTrack1Click
    end
    object Eject1: TMenuItem
      Caption = '&Eject'
      ShortCut = 0
      OnClick = Eject1Click
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Exit1: TMenuItem
      Caption = 'E&xit'
      ShortCut = 0
      OnClick = Exit1Click
    end
  end
end